home *** CD-ROM | disk | FTP | other *** search
/ Cream of the Crop 25 / Cream of the Crop 25.iso / program / dv_b1.zip / DV_B1.EXE / dview.exe / 0 / RCDATA / TWWFILTERDLG / TWWFILTERDLG.txt
Text File  |  1997-02-07  |  7KB  |  293 lines
  1. object wwFilterDlg: TwwFilterDlg
  2.   Left = 181
  3.   Top = 169
  4.   ActiveControl = FilterValueEdit
  5.   BorderStyle = bsDialog
  6.   Caption = 'Super Search'
  7.   ClientHeight = 240
  8.   ClientWidth = 470
  9.   Font.Color = clBlack
  10.   Font.Height = -11
  11.   Font.Name = 'MS Sans Serif'
  12.   Font.Style = [fsBold]
  13.   KeyPreview = True
  14.   PixelsPerInch = 96
  15.   Position = poScreenCenter
  16.   OnActivate = FormActivate
  17.   OnCloseQuery = FormCloseQuery
  18.   OnKeyDown = FormKeyDown
  19.   OnShow = FormShow
  20.   TextHeight = 13
  21.   object FieldsLbl: TLabel
  22.     Left = 8
  23.     Top = 4
  24.     Width = 34
  25.     Height = 13
  26.     Caption = '&Fields'
  27.     FocusControl = FieldsListBox
  28.   end
  29.   object FieldsListBox: TListBox
  30.     Left = 8
  31.     Top = 20
  32.     Width = 165
  33.     Height = 160
  34.     ItemHeight = 13
  35.     TabOrder = 0
  36.     OnClick = FieldsListBoxClick
  37.   end
  38.   object FieldOrder: TRadioGroup
  39.     Left = 7
  40.     Top = 201
  41.     Width = 166
  42.     Height = 37
  43.     Hint = 'Sort field list alphabetically or in their natural logical order'
  44.     Caption = 'Field Order'
  45.     Columns = 2
  46.     ItemIndex = 1
  47.     Items.Strings = (
  48.       'Alpha&betic'
  49.       '&Logical')
  50.     ParentShowHint = False
  51.     ShowHint = True
  52.     TabOrder = 2
  53.     OnClick = FieldOrderClick
  54.   end
  55.   object FieldCriteria: TGroupBox
  56.     Left = 180
  57.     Top = 3
  58.     Width = 199
  59.     Height = 178
  60.     TabOrder = 1
  61.     object SelectNotebook: TNotebook
  62.       Left = 2
  63.       Top = 15
  64.       Width = 195
  65.       Height = 161
  66.       Align = alClient
  67.       ParentShowHint = False
  68.       ShowHint = True
  69.       TabOrder = 0
  70.       object TPage
  71.         Left = 0
  72.         Top = 0
  73.         Caption = 'AsString'
  74.         object FieldValueLbl: TLabel
  75.           Left = 8
  76.           Top = 8
  77.           Width = 64
  78.           Height = 13
  79.           Caption = 'Field &Value'
  80.           FocusControl = FilterValueEdit
  81.         end
  82.         object FilterValueEdit: TEdit
  83.           Left = 8
  84.           Top = 24
  85.           Width = 133
  86.           Height = 21
  87.           Hint = 'Enter field'#39's search value'
  88.           AutoSize = False
  89.           ParentShowHint = False
  90.           ShowHint = True
  91.           TabOrder = 0
  92.           OnChange = FilterValueEditChange
  93.         end
  94.         object MatchTypeGroup: TRadioGroup
  95.           Left = 8
  96.           Top = 48
  97.           Width = 180
  98.           Height = 73
  99.           Hint = 'Specify how the Field Value should be compared'
  100.           Caption = 'Search Type'
  101.           Items.Strings = (
  102.             '&Exact Match'
  103.             '&Partial Match at Beginning'
  104.             'Partial Match Any&where')
  105.           ParentShowHint = False
  106.           ShowHint = True
  107.           TabOrder = 2
  108.         end
  109.         object Panel1: TPanel
  110.           Left = 8
  111.           Top = 119
  112.           Width = 180
  113.           Height = 26
  114.           BevelInner = bvRaised
  115.           BevelOuter = bvLowered
  116.           Caption = 'Panel1'
  117.           TabOrder = 3
  118.           object CaseSensitive: TCheckBox
  119.             Left = 9
  120.             Top = 6
  121.             Width = 164
  122.             Height = 14
  123.             Hint = 'Searching is case-sensitive'
  124.             Caption = 'Case Sensi&tive'
  125.             ParentShowHint = False
  126.             ShowHint = True
  127.             TabOrder = 0
  128.           end
  129.         end
  130.         object FilterValueClearButton: TBitBtn
  131.           Left = 144
  132.           Top = 23
  133.           Width = 45
  134.           Height = 21
  135.           Hint = 'Clear the current field'#39's search value'
  136.           Caption = '&Clear'
  137.           Enabled = False
  138.           Font.Color = clBlack
  139.           Font.Height = -11
  140.           Font.Name = 'MS Sans Serif'
  141.           Font.Style = [fsBold]
  142.           ParentFont = False
  143.           ParentShowHint = False
  144.           ShowHint = True
  145.           TabOrder = 1
  146.           OnClick = FilterValueClearButtonClick
  147.           NumGlyphs = 2
  148.         end
  149.       end
  150.       object TPage
  151.         Left = 0
  152.         Top = 0
  153.         Caption = 'asValue'
  154.         object StartingRangeLbl: TLabel
  155.           Left = 8
  156.           Top = 9
  157.           Width = 86
  158.           Height = 13
  159.           Caption = '&Starting Range'
  160.           FocusControl = MinValueEdit
  161.         end
  162.         object EndingRangeLbl: TLabel
  163.           Left = 8
  164.           Top = 52
  165.           Width = 81
  166.           Height = 13
  167.           Caption = 'En&ding Range'
  168.           FocusControl = MaxValueEdit
  169.         end
  170.         object MinValueEdit: TEdit
  171.           Left = 8
  172.           Top = 24
  173.           Width = 133
  174.           Height = 21
  175.           Hint = 'Enter starting range for field'
  176.           AutoSize = False
  177.           TabOrder = 0
  178.           OnChange = MinValueEditChange
  179.         end
  180.         object MaxValueEdit: TEdit
  181.           Left = 8
  182.           Top = 67
  183.           Width = 133
  184.           Height = 21
  185.           Hint = 'Enter ending range for field'
  186.           AutoSize = False
  187.           TabOrder = 1
  188.           OnChange = MaxValueEditChange
  189.         end
  190.         object MinValueClearButton: TBitBtn
  191.           Left = 144
  192.           Top = 23
  193.           Width = 45
  194.           Height = 21
  195.           Hint = 'Clear starting range for field'
  196.           Caption = '&Clear'
  197.           Enabled = False
  198.           Font.Color = clBlack
  199.           Font.Height = -11
  200.           Font.Name = 'MS Sans Serif'
  201.           Font.Style = [fsBold]
  202.           ParentFont = False
  203.           TabOrder = 2
  204.           OnClick = MinValueClearButtonClick
  205.           NumGlyphs = 2
  206.         end
  207.         object MaxValueClearButton: TBitBtn
  208.           Left = 144
  209.           Top = 67
  210.           Width = 45
  211.           Height = 21
  212.           Hint = 'Clear ending range for field'
  213.           Caption = 'Cl&ear'
  214.           Enabled = False
  215.           Font.Color = clBlack
  216.           Font.Height = -11
  217.           Font.Name = 'MS Sans Serif'
  218.           Font.Style = [fsBold]
  219.           ParentFont = False
  220.           TabOrder = 3
  221.           OnClick = MaxValueClearButtonClick
  222.           NumGlyphs = 2
  223.         end
  224.       end
  225.     end
  226.   end
  227.   object ClearSearchButton: TButton
  228.     Left = 284
  229.     Top = 209
  230.     Width = 95
  231.     Height = 25
  232.     Hint = 'Start a new search'
  233.     Caption = '&New Search'
  234.     Enabled = False
  235.     ParentShowHint = False
  236.     ShowHint = True
  237.     TabOrder = 4
  238.     TabStop = False
  239.     OnClick = ClearSearchButtonClick
  240.   end
  241.   object ViewButton: TButton
  242.     Left = 180
  243.     Top = 209
  244.     Width = 95
  245.     Height = 25
  246.     Hint = 'View summary of current search criteria'
  247.     Caption = 'View Su&mmary'
  248.     ParentShowHint = False
  249.     ShowHint = True
  250.     TabOrder = 3
  251.     TabStop = False
  252.     OnClick = ViewButtonClick
  253.   end
  254.   object ValueRangeTabSet: TTabSet
  255.     Left = 180
  256.     Top = 180
  257.     Width = 198
  258.     Height = 21
  259.     Hint = 'Search fields by value or by range'
  260.     DitherBackground = False
  261.     Font.Color = clBlack
  262.     Font.Height = -11
  263.     Font.Name = 'MS Sans Serif'
  264.     Font.Style = [fsBold]
  265.     ParentShowHint = False
  266.     ShowHint = True
  267.     Tabs.Strings = (
  268.       'By &Value'
  269.       'By &Range')
  270.     TabIndex = 0
  271.     OnChange = ValueRangeTabSetChange
  272.   end
  273.   object FieldTabSet: TTabSet
  274.     Left = 8
  275.     Top = 179
  276.     Width = 165
  277.     Height = 17
  278.     Hint = 'Show all fields or only currently searched fields'
  279.     DitherBackground = False
  280.     Font.Color = clBlack
  281.     Font.Height = -11
  282.     Font.Name = 'MS Sans Serif'
  283.     Font.Style = [fsBold]
  284.     ParentShowHint = False
  285.     ShowHint = True
  286.     Tabs.Strings = (
  287.       '&All'
  288.       '&Searched')
  289.     TabIndex = 0
  290.     OnChange = FieldTabSetChange
  291.   end
  292. end
  293.